Personal Computer World 2007 September/PCWSEP07.iso/Software/Shareware/xStarter 1.8.8/setup.exe/{app}/xStartUI.exe/0/RCDATA/TQUICKACTFORM/TQUICKACTFORM.txt

Text File | 2007-06-06 | 8KB | 336 lines

object QuickActForm: TQuickActForm
  Left = 286
  Top = 180
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Quick action start'
  ClientHeight = 492
  ClientWidth = 448
  Color = clBtnFace
  Constraints.MinHeight = 519
  Constraints.MinWidth = 454
  ParentFont = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel3: TBevel
    Left = 76
    Top = 8
    Width = 365
    Height = 5
    Shape = bsBottomLine
  end
  object Bevel1: TBevel
    Left = 0
    Top = 448
    Width = 448
    Height = 3
    Align = alBottom
    Shape = bsBottomLine
  end
  object lbActPrms: TLabel
    Left = 4
    Top = 4
    Width = 81
    Height = 13
    Caption = 'Action params'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 451
    Width = 448
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    DesignSize = (
      448
      41)
    object btOk: TElPopupButton
      Left = 210
      Top = 8
      Width = 113
      Height = 25
      DrawDefaultFrame = False
      Caption = 'OK'
      TabOrder = 0
      OnClick = btOkClick
      Anchors = [akRight, akBottom]
    end
    object btCancel: TElPopupButton
      Left = 330
      Top = 8
      Width = 113
      Height = 25
      DrawDefaultFrame = False
      Caption = 'Cancel'
      TabOrder = 1
      OnClick = btCancelClick
      Anchors = [akRight, akBottom]
    end
    object btHelp: TElPopupButton
      Left = 8
      Top = 8
      Width = 113
      Height = 25
      ImageIndex = 14
      UseImageList = True
      Images = TrayForm.ilMain
      DrawDefaultFrame = False
      Caption = 'Help'
      TabOrder = 2
      OnClick = btHelpClick
      Anchors = [akLeft, akBottom]
    end
    object btFixOk: TElPopupButton
      Left = 138
      Top = 8
      Width = 47
      Height = 25
      DrawDefaultFrame = False
      ModalResult = 1
      Caption = 'OK'
      TabOrder = 3
      Visible = False
      Anchors = [akRight, akBottom]
    end
  end
  object Panel2: TPanel
    Left = 1
    Top = 18
    Width = 440
    Height = 350
    BevelOuter = bvNone
    Constraints.MinHeight = 350
    Constraints.MinWidth = 440
    FullRepaint = False
    TabOrder = 1
  end
  object Panel3: TPanel
    Left = 0
    Top = 369
    Width = 448
    Height = 79
    Align = alBottom
    BevelOuter = bvLowered
    BorderStyle = bsSingle
    Color = clBtnShadow
    TabOrder = 2
    DesignSize = (
      444
      75)
    object lbTimeToStart: TLabel
      Left = 9
      Top = 8
      Width = 58
      Height = 13
      Caption = 'Time to start'
      Color = clBtnShadow
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindow
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object dcTimeToStart: TElPageControl
      Left = 12
      Top = 24
      Width = 425
      Height = 49
      Flat = True
      ShowBorder = False
      ShowTabs = False
      Style = etsNetTabs
      TabIndex = 0
      HotTrackFont.Charset = DEFAULT_CHARSET
      HotTrackFont.Color = clBlue
      HotTrackFont.Height = -11
      HotTrackFont.Name = 'MS Sans Serif'
      HotTrackFont.Style = []
      ActivePage = dcOnce
      ActiveTabFont.Charset = DEFAULT_CHARSET
      ActiveTabFont.Color = clWindowText
      ActiveTabFont.Height = -11
      ActiveTabFont.Name = 'MS Sans Serif'
      ActiveTabFont.Style = []
      ParentColor = False
      TabOrder = 0
      UseXPThemes = False
      DockOrientation = doNoOrient
      object dcOnce: TElTabSheet
        PageControl = dcTimeToStart
        Caption = 'DCPage2'
        Color = clBtnShadow
        object lbOnceAt: TLabel
          Left = 12
          Top = 14
          Width = 10
          Height = 13
          Caption = 'At'
          FocusControl = teOnceAt
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object lbOnceOn: TLabel
          Left = 216
          Top = 14
          Width = 14
          Height = 13
          Caption = 'On'
          FocusControl = deOnceOn
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object teOnceAt: TElDateTimePicker
          Left = 116
          Top = 10
          Width = 89
          Height = 21
          Format = edfLongTime
          FormatString = 'c'
          DateTime = 38809.693713101800000000
          Flat = True
          CalendarLineColorDark = clWindow
          UseSystemStartOfWeek = False
          WeekEndDays = [Sun, Sat]
          MinDate = -693593.000000000000000000
          MaxDate = 999999.000000000000000000
          ButtonWidth = 17
          LineBorderActiveColor = clBlack
          LineBorderInactiveColor = clBlack
          ButtonThinFrame = False
          UnassignedChar = ' '
          TranslateDays = True
          CalendarHolidayColor = clBlack
          AutoAdvance = True
          DockOrientation = doNoOrient
          ParentColor = False
          TabOrder = 0
          TabStop = True
        end
        object deOnceOn: TElDateTimePicker
          Left = 240
          Top = 10
          Width = 114
          Height = 21
          Format = edfShortDate
          FormatString = 'c'
          DateTime = 38809.693713287000000000
          Flat = True
          ShowPopupCalendar = True
          CalendarLineColorDark = clWindow
          StartOfWeek = 1
          UseSystemStartOfWeek = False
          WeekEndDays = [Sun, Sat]
          MinDate = -693593.000000000000000000
          MaxDate = 999999.000000000000000000
          ButtonWidth = 17
          LineBorderActiveColor = clBlack
          LineBorderInactiveColor = clBlack
          ButtonVisible = False
          ButtonThinFrame = False
          UnassignedChar = ' '
          TranslateDays = True
          CalendarHolidayColor = clBlack
          AutoAdvance = True
          DockOrientation = doNoOrient
          ParentColor = False
          TabOrder = 1
          TabStop = True
        end
      end
      object dcNow: TElTabSheet
        PageControl = dcTimeToStart
        Caption = 'DCPage3'
        Color = clBtnShadow
        Visible = False
      end
      object dcAfter: TElTabSheet
        PageControl = dcTimeToStart
        Caption = 'DCPage1'
        Color = clBtnShadow
        Visible = False
        object lbThePeriod: TLabel
          Left = 8
          Top = 12
          Width = 85
          Height = 13
          Caption = 'The period of time'
          FocusControl = frAfter.edsHour
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindow
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        inline frAfter: TTimePartsFrame
          Left = 112
          Top = 7
          Width = 289
          Height = 26
          Constraints.MinWidth = 286
          TabOrder = 0
          TabStop = True
          ExplicitLeft = 112
          ExplicitTop = 7
          ExplicitWidth = 289
          ExplicitHeight = 26
          inherited mxFlatLabel1: TLabel
            Width = 32
            ExplicitWidth = 32
          end
          inherited mxFlatLabel2: TLabel
            Width = 27
            ExplicitWidth = 27
          end
          inherited mxFlatLabel3: TLabel
            Width = 28
            ExplicitWidth = 28
          end
        end
      end
    end
    object cbRunTask: TElComboBox
      Left = 128
      Top = 4
      Width = 281
      Height = 21
      Cursor = crIBeam
      Items.Strings = (
        'Now'
        'Once'
        'After some time')
      Style = csDropDownList
      ItemHeight = 13
      OnChange = cbRunTaskChange
      Flat = True
      LineBorderActiveColor = clBlack
      LineBorderInactiveColor = clBlack
      TabOrder = 1
      ParentColor = False
      Anchors = [akLeft, akTop, akRight]
    end
  end
end